* sun-mouse.el (suspend-emacstool): Run suspend-hooks, not

	suspend-hook.

diff --git a/lisp/term/sun-mouse.el b/lisp/term/sun-mouse.el
index 0ac9e46f4ea8cb4b1614e2a0fcce9ce43d7252a1..bca3339c264b18d91850fc6656e2080df121e597 100644 (file)
--- a/lisp/term/sun-mouse.el
+++ b/lisp/term/sun-mouse.el
@@ -665,7 +665,7 @@ If running under as a detached process emacstool,
 you don't want to suspend  (there is no way to resume), 
 just close the window, and wait for reopening."
   (interactive)
-  (run-hooks 'suspend-hook)
+  (run-hooks 'suspend-hooks)
   (if stuffstring (send-string-to-terminal stuffstring))
   (send-string-to-terminal "\033[2t")  ; To close EmacsTool window.
   (run-hooks 'suspend-resume-hook))